home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 7: Sunsite / Linux Cubed Series 7 - Sunsite Vol 1.iso / system / shells / kiss-0.11 / kiss-0 / kiss / src / doprintenv.c < prev    next >
C/C++ Source or Header  |  1995-03-23  |  718b  |  33 lines
  1. #include "kiss.h"
  2.  
  3. int doprintenv (Stringstack s)
  4. {
  5.     register int
  6.     i,
  7.     ret = 0;
  8.     register char
  9.     *cp;
  10.  
  11.     if (getopt (s.nstr, s.str, "h") != -1)
  12.     error ("Bad commandline.\n"
  13.            "Usage: %s -h          this text\n"
  14.            "       %s variable(s) show environment setting of variable(s)\n"
  15.            "       %s             show entire environment\n"
  16.            , progname, progname, progname);
  17.  
  18.     if (s.nstr > 1)
  19.     for (i = 1; i < s.nstr; i++)
  20.         if (! (cp = getenv (s.str [i])) )
  21.         {
  22.         warning ("no environment variable \"%s\" defined", s.str [i]);
  23.         ret++;
  24.         }
  25.         else
  26.         printf ("%s=%s\n", s.str [i], cp);
  27.     else
  28.     for (i = 0; environ [i]; i++)
  29.         printf ("%s\n", environ [i]);
  30.  
  31.     return (ret);
  32. }
  33.